
          (* -------> DEFINITION MODULE <-------- *)

DEFINITION MODULE AmokDoc;

FROM SYSTEM IMPORT      WORD;

FROM Heap IMPORT        AllocMem;

TYPE    Img=RECORD
          Dat:ARRAY [0..143] OF WORD;
        END;


CONST   Doc=  0;
        DocH=  1;


VAR     Imgwidth   :INTEGER;
        Imgheight  :INTEGER;
        Imgdepth   :INTEGER;
        ImgPtr     :ARRAY [0..  1] OF POINTER TO Img;


END AmokDoc.
